NCBirths2004.csv

This dataset is described on pp. 2-3 of the textbook. You may load it from the dataset URL linked above or from the resampledata package.

library(tidyverse)
DATA <- read_csv("https://raw.githubusercontent.com/STAT-JET-ASU/Datasets/master/Chihara/NCBirths2004.csv")
glimpse(DATA)
Observations: 1,009
Variables: 8
$ ID         <dbl> 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,…
$ MothersAge <chr> "30-34", "30-34", "35-39", "20-24", "25-29", "35-39", "20-…
$ Tobacco    <chr> "No", "No", "No", "No", "No", "No", "No", "No", "No", "No"…
$ Alcohol    <chr> "No", "No", "No", "No", "No", "No", "No", "No", "No", "No"…
$ Gender     <chr> "Male", "Male", "Female", "Female", "Male", "Female", "Fem…
$ Weight     <dbl> 3827, 3629, 3062, 3430, 3827, 3119, 3260, 3969, 3175, 3005…
$ Gestation  <dbl> 40, 38, 37, 39, 38, 39, 40, 40, 39, 39, 41, 39, 38, 39, 37…
$ Smoker     <chr> "No", "No", "No", "No", "No", "No", "No", "No", "No", "No"…
head(DATA)
# A tibble: 6 x 8
     ID MothersAge Tobacco Alcohol Gender Weight Gestation Smoker
  <dbl> <chr>      <chr>   <chr>   <chr>   <dbl>     <dbl> <chr> 
1     1 30-34      No      No      Male     3827        40 No    
2     2 30-34      No      No      Male     3629        38 No    
3     3 35-39      No      No      Female   3062        37 No    
4     4 20-24      No      No      Female   3430        39 No    
5     5 25-29      No      No      Male     3827        38 No    
6     6 35-39      No      No      Female   3119        39 No